--[[ 编码: WMS-22-02 名称: 发货单-删除后 作者:HAN 日期:2025-1-29 级别:固定 (说明本段代码在项目中不太会变化) 函数: BeforeDataObjCreate 功能: 1)删除【收货单明细】 更改记录: --]] json = require ("json") mobox = require ("OILua_JavelinExt") m3 = require("oi_base_mobox") function AfterDataObjDelete ( strLuaDEID ) local nRet, strRetInfo -- 获取 S_NO nRet, strRetInfo = mobox.getCurEditDataObjAttr( strLuaDEID, "S_NO" ) if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..strRetInfo ) end local obj_attrs = json.decode( strRetInfo ) local shipping_no = obj_attrs[1].value -- 发货单编号 if ( shipping_no ~= "" ) then local strCondition = "S_SHIPPING_NO = '"..shipping_no.."'" nRet, strRetInfo = mobox.deleteDataObject( strLuaDEID, "Shipping_Detail", strCondition ) if ( nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除相关的【发货单明细】失败! "..strRetInfo ) end -- 清除最大行号记录 nRet, strRetInfo = mobox.removeSerialNumber( "行号", shipping_no ) if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "removeSerialNumber() 失败! "..strRetInfo ) end end end